﻿Imports System.Data
Imports System.Data.SqlClient
Imports System.Configuration


Public Class BEGPPersonal
    'Creacion de variables - el nombre tiene relacion con la tabla TB_Personal
    Private _percodPersona As String
    Private _pernomPersona As String
    Private _perapePaterno As String
    Private _percodCategoria As Int16
    Private _percodLos As Int16
    Private _percodSubLos As Int16
    Private _pernumHoras As Double
    Private _permrkSituacion As Integer
    Private _permrkEstado As Byte
    Private _percodUserCrea As String
    Private _perfecCrea As DateTime
    Private _percodUserModifica As String
    Private _perfecModifica As DateTime
    Private _perapeMaterno As String

    'Métodos de GET and SET

    Public Property percodPersona() As String
        Get
            Return _percodPersona
        End Get
        Set(ByVal value As String)
            _percodPersona = value
        End Set
    End Property

    Public Property pernomPersona() As String
        Get
            Return _pernomPersona
        End Get
        Set(ByVal value As String)
            _pernomPersona = value
        End Set
    End Property

    Public Property perapePaterno() As String
        Get
            Return _perapePaterno
        End Get
        Set(ByVal value As String)
            _perapePaterno = value
        End Set
    End Property

    Public Property percodCategoria() As Int16
        Get
            Return _percodCategoria
        End Get
        Set(ByVal value As Int16)
            _percodCategoria = value
        End Set
    End Property

    Public Property percodLos() As Int16
        Get
            Return _percodLos
        End Get
        Set(ByVal value As Int16)
            _percodLos = value
        End Set
    End Property

    Public Property percodSubLos() As Int16
        Get
            Return _percodSubLos
        End Get
        Set(ByVal value As Int16)
            _percodSubLos = value
        End Set
    End Property

    Public Property pernumHoras() As Double
        Get
            Return _pernumHoras
        End Get
        Set(ByVal value As Double)
            _pernumHoras = value
        End Set
    End Property

    Public Property permrkSituacion() As Integer
        Get
            Return _permrkSituacion
        End Get
        Set(ByVal value As Integer)
            _permrkSituacion = value
        End Set
    End Property

    Public Property permrkEstado() As Integer
        Get
            Return _permrkEstado
        End Get
        Set(ByVal value As Integer)
            _permrkEstado = value
        End Set
    End Property

    Public Property percodUserCrea() As String
        Get
            Return _percodUserCrea
        End Get
        Set(ByVal value As String)
            _percodUserCrea = value
        End Set
    End Property

    Public Property perfecCrea() As DateTime
        Get
            Return _perfecCrea
        End Get
        Set(ByVal value As DateTime)
            _perfecCrea = value
        End Set
    End Property

    Public Property percodUserModifica() As String
        Get
            Return _percodUserModifica
        End Get
        Set(ByVal value As String)
            _percodUserModifica = value
        End Set
    End Property

    Public Property perfecModifica() As DateTime
        Get
            Return _perfecModifica
        End Get
        Set(ByVal value As DateTime)
            _perfecModifica = value
        End Set
    End Property

    Public Property perapeMaterno() As String
        Get
            Return _perapeMaterno
        End Get
        Set(ByVal value As String)
            _perapeMaterno = value
        End Set
    End Property

End Class
